﻿Public Class NotePadData
    Private Shared instance_ As NotePadData = Nothing

    Public tabID As Integer = 1

    Public Shared Function Instance() As NotePadData
        If instance_ Is Nothing Then
            instance_ = New NotePadData
            Return instance_
        End If
        Return instance_
    End Function
End Class
